home *** CD-ROM | disk | FTP | other *** search
/ Amoszine 3 / Amoszine 3.adf / MORE_SOURCE / F1Multi_Numbers.AMOS < prev    next >
AMOS Basic Source Code Archive  |  1992-02-26  |  3.4 KB

view JSON data     |     view as text     |     open on a Mac     |     open on a PC

This file was processed as: AMOS Basic Source Code Archive (archive/amosSrc).

You can browse this item here: F1Multi_Numbers.AMOS

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert AMOS Basic Source Code Archive (archive/amosSrc) magic Supported
100% file AMOS Basic source code, tested default
99% file data default
50% TrID AMOS source (v1.34 Alt) default
49% TrID AMOS source (generic) default
100% gt2 Kopftext: 'AMOS Basic V134 ' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 4d 4f 53 20 42 61 73 | 69 63 20 56 31 33 34 20 |AMOS Bas|ic V134 |
|00000010| 00 00 0d 70 04 01 06 52 | 00 00 00 00 27 01 06 52 |...p...R|....'..R|
|00000020| 00 46 20 52 6f 75 74 69 | 6e 65 20 66 6f 72 20 52 |.F Routi|ne for R|
|00000030| 61 6e 64 6f 6d 20 53 65 | 6c 65 63 74 69 6f 6e 20 |andom Se|lection |
|00000040| 6f 66 20 44 69 66 66 65 | 72 65 6e 74 20 4e 75 6d |of Diffe|rent Num|
|00000050| 62 65 72 73 20 20 28 20 | 42 79 20 44 61 76 65 20 |bers ( |By Dave |
|00000060| 4b 69 6e 67 20 29 20 20 | 00 00 04 01 06 52 00 00 |King ) |.....R..|
|00000070| 00 00 27 01 06 52 00 46 | 20 54 68 69 73 20 72 6f |..'..R.F| This ro|
|00000080| 75 74 69 6e 65 20 63 61 | 6e 20 62 65 20 75 73 65 |utine ca|n be use|
|00000090| 64 20 74 6f 20 70 69 63 | 6b 20 65 61 63 68 20 6e |d to pic|k each n|
|000000a0| 75 6d 62 65 72 20 66 72 | 6f 6d 20 61 20 67 69 76 |umber fr|om a giv|
|000000b0| 65 6e 20 74 6f 74 61 6c | 20 6f 6e 63 65 20 00 00 |en total| once ..|
|000000c0| 28 01 06 52 00 48 20 65 | 2e 67 2e 20 49 66 20 79 |(..R.H e|.g. If y|
|000000d0| 6f 75 72 20 65 6e 74 65 | 72 20 31 30 20 61 73 20 |our ente|r 10 as |
|000000e0| 79 6f 75 72 20 6e 75 6d | 62 65 72 20 61 20 73 74 |your num|ber a st|
|000000f0| 72 69 6e 67 20 63 61 6c | 6c 65 64 20 50 49 43 4b |ring cal|led PICK|
|00000100| 24 20 69 73 20 63 72 65 | 61 74 65 64 20 20 00 00 |$ is cre|ated ..|
|00000110| 25 01 06 52 00 42 20 63 | 6f 6e 74 61 69 6e 69 6e |%..R.B c|ontainin|
|00000120| 67 20 65 61 63 68 20 6e | 75 6d 62 65 72 20 66 72 |g each n|umber fr|
|00000130| 6f 6d 20 31 20 74 6f 20 | 31 30 2e 20 48 65 72 65 |om 1 to |10. Here|
|00000140| 27 73 20 68 6f 77 20 69 | 74 20 77 6f 72 6b 73 20 |'s how i|t works |
|00000150| 2e 2e 2e 2e 2e 2e 2e 2e | 00 00 27 01 06 52 00 46 |........|..'..R.F|
|00000160| 20 54 6f 20 68 61 6e 64 | 6c 65 20 61 6e 79 20 6e | To hand|le any n|
|00000170| 75 6d 62 65 72 20 66 72 | 6f 6d 20 31 20 2d 20 39 |umber fr|om 1 - 9|
|00000180| 39 39 20 50 49 43 4b 24 | 20 69 73 20 63 72 65 61 |99 PICK$| is crea|
|00000190| 74 65 64 20 77 69 74 68 | 20 70 72 65 63 65 64 69 |ted with| precedi|
|000001a0| 6e 67 20 30 27 73 00 00 | 26 01 06 52 00 44 20 69 |ng 0's..|&..R.D i|
|000001b0| 6e 20 6f 75 72 20 65 78 | 61 6d 70 6c 65 20 6f 66 |n our ex|ample of|
|000001c0| 20 31 30 20 50 49 43 4b | 24 20 77 69 6c 6c 20 3d | 10 PICK|$ will =|
|000001d0| 20 22 30 30 31 30 30 32 | 30 30 33 30 30 34 30 30 | "001002|00300400|
|000001e0| 35 30 30 36 30 30 37 30 | 30 38 30 30 39 30 31 30 |50060070|08009010|
|000001f0| 22 20 00 00 25 01 06 52 | 00 42 20 54 68 65 20 52 |" ..%..R|.B The R|
|00000200| 61 6e 64 6f 6d 20 53 65 | 6c 65 63 74 20 72 6f 75 |andom Se|lect rou|
|00000210| 74 69 6e 65 20 70 69 63 | 6b 73 20 61 20 72 61 6e |tine pic|ks a ran|
|00000220| 64 6f 6d 20 6e 75 6d 62 | 65 72 20 64 65 70 65 6e |dom numb|er depen|
|00000230| 64 61 6e 74 20 6f 6e 20 | 74 68 65 20 00 00 24 01 |dant on |the ..$.|
|00000240| 06 52 00 40 20 4c 65 6e | 67 74 68 20 6f 66 20 50 |.R.@ Len|gth of P|
|00000250| 49 43 4b 24 20 44 69 76 | 69 64 65 64 20 62 79 20 |ICK$ Div|ided by |
|00000260| 33 2c 20 74 68 65 6e 20 | 74 6f 20 65 6e 73 75 72 |3, then |to ensur|
|00000270| 65 20 74 68 69 73 20 6e | 75 6d 62 65 72 20 69 73 |e this n|umber is|
|00000280| 20 6e 6f 74 00 00 17 01 | 06 52 00 26 20 63 68 6f | not....|.R.& cho|
|00000290| 73 65 6e 20 61 67 61 69 | 6e 20 69 74 20 69 73 20 |sen agai|n it is |
|000002a0| 72 65 6d 6f 76 65 64 20 | 66 72 6f 6d 20 50 49 43 |removed |from PIC|
|000002b0| 4b 24 00 00 05 01 06 52 | 00 02 20 20 00 00 0e 01 |K$.....R|.. ....|
|000002c0| 06 52 00 14 20 4f 70 65 | 6e 20 61 20 48 69 72 65 |.R.. Ope|n a Hire|
|000002d0| 73 20 53 63 72 65 65 6e | 00 00 04 01 06 52 00 00 |s Screen|.....R..|
|000002e0| 00 00 18 01 09 ea 00 3e | 00 00 00 00 00 5c 00 3e |.......>|.....\.>|
|000002f0| 00 00 02 80 00 5c 00 3e | 00 00 00 fa 00 5c 00 3e |.....\.>|.....\.>|
|00000300| 00 00 00 10 00 5c 0c 84 | 00 54 14 46 00 54 0d 34 |.....\..|.T.F.T.4|
|00000310| 00 00 08 01 00 0c 00 00 | 06 00 62 65 67 69 6e 00 |........|..begin.|
|00000320| 00 00 04 01 06 52 00 00 | 00 00 25 01 06 52 00 42 |.....R..|..%..R.B|
|00000330| 20 53 65 74 20 50 61 70 | 65 72 20 63 6f 6c 6f 75 | Set Pap|er colou|
|00000340| 72 20 74 6f 20 42 6c 61 | 63 6b 20 61 6e 64 20 63 |r to Bla|ck and c|
|00000350| 6c 65 61 72 20 73 63 72 | 65 65 6e 2c 20 74 68 65 |lear scr|een, the|
|00000360| 6e 20 68 69 64 65 20 74 | 68 65 20 6d 6f 75 73 65 |n hide t|he mouse|
|00000370| 20 20 00 00 04 01 06 52 | 00 00 00 00 0a 01 13 dc | .....R|........|
|00000380| 00 3e 00 00 00 00 00 54 | 0b ae 00 54 1d d2 00 00 |.>.....T|...T....|
|00000390| 04 01 06 52 00 00 00 00 | 0d 01 06 52 00 12 20 52 |...R....|...R.. R|
|000003a0| 65 71 75 65 73 74 20 61 | 20 6e 75 6d 62 65 72 20 |equest a| number |
|000003b0| 00 00 04 01 06 52 00 00 | 00 00 1e 01 13 78 00 3e |.....R..|.....x.>|
|000003c0| 00 00 00 03 00 5c 00 3e | 00 00 00 07 00 54 04 76 |.....\.>|.....T.v|
|000003d0| 00 26 00 20 45 6e 74 65 | 72 20 61 20 4e 75 6d 62 |.&. Ente|r a Numb|
|000003e0| 65 72 20 42 65 74 77 65 | 65 6e 20 32 20 61 6e 64 |er Betwe|en 2 and|
|000003f0| 20 36 33 38 00 00 11 01 | 13 78 00 3e 00 00 00 03 | 638....|.x.>....|
|00000400| 00 5c 00 3e 00 00 00 0a | 00 54 04 d0 00 06 00 00 |.\.>....|.T......|
|00000410| 04 02 6e 75 6d 00 00 00 | 03 01 0b ae 00 00 04 01 |..num...|........|
|00000420| 06 52 00 00 00 00 1e 01 | 06 52 00 34 20 53 65 74 |.R......|.R.4 Set|
|00000430| 20 56 61 72 69 61 62 6c | 65 20 4e 55 4d 45 4e 54 | Variabl|e NUMENT|
|00000440| 52 49 45 53 20 74 6f 20 | 65 71 75 61 6c 20 54 68 |RIES to |equal Th|
|00000450| 65 20 4e 75 6d 62 65 72 | 20 65 6e 74 65 72 65 64 |e Number| entered|
|00000460| 00 00 05 01 06 52 00 02 | 20 20 00 00 13 01 00 06 |.....R..| ......|
|00000470| 00 06 0a 00 6e 75 6d 65 | 6e 74 72 69 65 73 ff a2 |....nume|ntries..|
|00000480| 05 a4 00 74 00 06 00 00 | 04 02 6e 75 6d 00 00 7c |...t....|..num..||
|00000490| 00 00 05 01 06 52 00 02 | 20 20 00 00 10 01 06 52 |.....R..| .....R|
|000004a0| 00 18 20 53 65 74 20 72 | 61 6e 64 6f 6d 20 6e 75 |.. Set r|andom nu|
|000004b0| 6d 62 65 72 20 73 65 65 | 64 20 00 00 04 01 06 52 |mber see|d .....R|
|000004c0| 00 00 00 00 04 01 06 90 | 12 ce 00 00 04 01 06 52 |........|.......R|
|000004d0| 00 00 00 00 1e 01 06 52 | 00 34 20 53 65 74 20 47 |.......R|.4 Set G|
|000004e0| 41 50 20 56 61 72 69 61 | 62 6c 65 20 2d 20 6f 6e |AP Varia|ble - on|
|000004f0| 6c 79 20 75 73 65 64 20 | 66 6f 72 20 73 70 61 63 |ly used |for spac|
|00000500| 69 6e 67 20 74 68 65 20 | 74 65 78 74 20 20 00 00 |ing the |text ..|
|00000510| 04 01 06 52 00 00 00 00 | 1a 01 00 06 00 0c 04 00 |...R....|........|
|00000520| 67 61 70 00 ff a2 00 74 | 05 da 00 74 00 06 00 00 |gap....t|...t....|
|00000530| 04 02 6e 75 6d 00 00 7c | ff e2 00 3e 00 00 00 08 |..num..||...>....|
|00000540| 00 7c ff c0 00 3e 00 00 | 00 05 00 00 04 01 06 52 |.|...>..|.......R|
|00000550| 00 00 00 00 27 01 06 52 | 00 46 20 4e 6f 77 20 63 |....'..R|.F Now c|
|00000560| 72 65 61 74 65 20 50 49 | 43 4b 24 20 2d 20 6f 62 |reate PI|CK$ - ob|
|00000570| 76 69 6f 75 73 6c 79 20 | 74 68 65 20 6c 61 72 67 |viously |the larg|
|00000580| 65 72 20 74 68 65 20 6e | 75 6d 62 65 72 20 65 6e |er the n|umber en|
|00000590| 74 65 72 65 64 20 74 68 | 65 20 6c 6f 6e 67 65 72 |tered th|e longer|
|000005a0| 00 00 28 01 06 52 00 48 | 20 69 74 20 74 61 6b 65 |..(..R.H| it take|
|000005b0| 73 20 74 6f 20 63 72 65 | 61 74 65 20 74 68 65 20 |s to cre|ate the |
|000005c0| 73 74 72 69 6e 67 20 2d | 20 77 69 74 68 20 36 33 |string -| with 63|
|000005d0| 38 20 74 68 65 20 73 74 | 72 69 6e 67 20 69 73 20 |8 the st|ring is |
|000005e0| 31 2c 39 31 34 20 43 68 | 61 72 61 63 74 65 72 73 |1,914 Ch|aracters|
|000005f0| 00 00 17 01 06 52 00 26 | 20 69 6e 20 6c 65 6e 67 |.....R.&| in leng|
|00000600| 74 68 20 28 20 36 33 38 | 20 4d 75 6c 74 69 70 6c |th ( 638| Multipl|
|00000610| 69 65 64 20 62 79 20 33 | 20 29 20 20 20 20 00 00 |ied by 3| ) ..|
|00000620| 04 01 06 52 00 00 00 00 | 0e 01 00 0c 00 00 12 00 |...R....|........|
|00000630| 63 72 65 61 74 65 5f 70 | 69 63 6b 5f 73 74 72 69 |create_p|ick_stri|
|00000640| 6e 67 00 00 0a 01 00 06 | 00 12 04 02 70 69 63 6b |ng......|....pick|
|00000650| ff a2 00 26 00 00 00 00 | 15 01 02 3c 01 2e 00 06 |...&....|...<....|
|00000660| 00 18 02 00 78 00 ff a2 | 00 3e 00 00 00 01 00 94 |....x...|.>......|
|00000670| 00 06 00 06 0a 00 6e 75 | 6d 65 6e 74 72 69 65 73 |......nu|mentries|
|00000680| 00 00 15 04 00 06 00 1e | 02 02 78 78 ff a2 05 1e |........|..xx....|
|00000690| 00 74 05 98 00 74 00 06 | 00 18 02 00 78 00 00 7c |.t...t..|....x..||
|000006a0| 00 5c 00 3e 00 00 00 02 | 00 7c 00 00 04 04 06 52 |.\.>....|.|.....R|
|000006b0| 00 00 00 00 14 04 06 52 | 00 20 20 50 6c 61 63 65 |.......R|. Place|
|000006c0| 20 70 72 65 63 65 64 69 | 6e 67 20 30 27 73 20 69 | precedi|ng 0's i|
|000006d0| 66 20 72 65 71 75 69 72 | 65 64 00 00 04 04 06 52 |f requir|ed.....R|
|000006e0| 00 00 00 00 1d 04 02 be | 00 32 05 da 00 74 00 06 |........|.2...t..|
|000006f0| 00 1e 02 02 78 78 00 7c | ff a2 00 3e 00 00 00 01 |....xx.||...>....|
|00000700| 02 c6 00 06 00 1e 02 02 | 78 78 ff a2 00 26 00 02 |........|xx...&..|
|00000710| 30 30 ff c0 00 06 00 1e | 02 02 78 78 00 00 1d 04 |00......|..xx....|
|00000720| 02 be 00 32 05 da 00 74 | 00 06 00 1e 02 02 78 78 |...2...t|......xx|
|00000730| 00 7c ff a2 00 3e 00 00 | 00 02 02 c6 00 06 00 1e |.|...>..|........|
|00000740| 02 02 78 78 ff a2 00 26 | 00 01 30 00 ff c0 00 06 |..xx...&|..0.....|
|00000750| 00 1e 02 02 78 78 00 00 | 12 04 00 06 00 12 04 02 |....xx..|........|
|00000760| 70 69 63 6b ff a2 00 06 | 00 12 04 02 70 69 63 6b |pick....|....pick|
|00000770| ff c0 00 06 00 1e 02 02 | 78 78 00 00 07 01 02 46 |........|xx.....F|
|00000780| 00 06 00 18 02 00 78 00 | 00 00 04 01 06 52 00 00 |......x.|.....R..|
|00000790| 00 00 12 01 06 52 00 1c | 20 52 61 6e 64 6f 6d 6c |.....R..| Randoml|
|000007a0| 79 20 53 65 6c 65 63 74 | 20 66 72 6f 6d 20 50 49 |y Select| from PI|
|000007b0| 43 4b 24 20 00 00 04 01 | 06 52 00 00 00 00 14 01 |CK$ ....|.R......|
|000007c0| 00 0c 00 00 1e 00 72 61 | 6e 64 6f 6d 5f 73 65 6c |......ra|ndom_sel|
|000007d0| 65 63 74 5f 66 72 6f 6d | 5f 70 69 63 6b 5f 73 74 |ect_from|_pick_st|
|000007e0| 72 69 6e 67 00 00 04 01 | 06 52 00 00 00 00 22 01 |ring....|.R....".|
|000007f0| 06 52 00 3c 20 53 65 74 | 20 58 50 20 61 6e 64 20 |.R.< Set| XP and |
|00000800| 59 50 20 56 61 72 69 61 | 62 6c 65 73 20 2d 20 6f |YP Varia|bles - o|
|00000810| 6e 6c 79 20 75 73 65 64 | 20 66 6f 72 20 70 6f 73 |nly used| for pos|
|00000820| 69 74 69 6f 6e 69 6e 67 | 20 74 65 78 74 20 20 20 |itioning| text |
|00000830| 00 00 04 01 06 52 00 00 | 00 00 13 01 00 06 00 24 |.....R..|.......$|
|00000840| 02 00 78 70 ff a2 00 3e | 00 00 00 01 00 54 00 06 |..xp...>|.....T..|
|00000850| 00 2a 02 00 79 70 ff a2 | 00 3e 00 00 00 08 00 00 |.*..yp..|.>......|
|00000860| 0a 01 10 50 00 3e 00 00 | 00 02 00 5c 00 3e 00 00 |...P.>..|...\.>..|
|00000870| 00 00 00 00 15 01 02 3c | 04 80 00 06 00 18 02 00 |.......<|........|
|00000880| 78 00 ff a2 00 3e 00 00 | 00 01 00 94 00 06 00 06 |x....>..|........|
|00000890| 0a 00 6e 75 6d 65 6e 74 | 72 69 65 73 00 00 26 04 |..nument|ries..&.|
|000008a0| 00 06 00 30 02 00 78 78 | ff a2 06 86 00 74 00 74 |...0..xx|.....t.t|
|000008b0| 05 da 00 74 00 06 00 12 | 04 02 70 69 63 6b 00 7c |...t....|..pick.||
|000008c0| ff ec 00 3e 00 00 00 03 | 00 7c 00 7c 00 54 00 06 |...>....|.|.|.T..|
|000008d0| 00 30 02 00 78 78 ff a2 | 00 06 00 30 02 00 78 78 |.0..xx..|...0..xx|
|000008e0| ff ca 00 3e 00 00 00 01 | 00 00 16 04 02 be 00 24 |...>....|.......$|
|000008f0| 00 06 00 30 02 00 78 78 | ff a2 ff ca 00 3e 00 00 |...0..xx|.....>..|
|00000900| 00 01 02 c6 00 06 00 30 | 02 00 78 78 ff a2 00 3e |.......0|..xx...>|
|00000910| 00 00 00 00 00 00 15 04 | 00 06 00 30 02 00 78 78 |........|...0..xx|
|00000920| ff a2 00 74 00 06 00 30 | 02 00 78 78 ff e2 00 3e |...t...0|..xx...>|
|00000930| 00 00 00 03 00 7c ff c0 | 00 3e 00 00 00 01 00 00 |.....|..|.>......|
|00000940| 05 04 06 52 00 02 20 20 | 00 00 24 04 06 52 00 40 |...R.. |..$..R.@|
|00000950| 20 54 68 65 20 56 61 72 | 69 61 62 6c 65 20 53 45 | The Var|iable SE|
|00000960| 4c 24 20 69 73 20 72 65 | 74 75 72 6e 65 64 20 77 |L$ is re|turned w|
|00000970| 69 74 68 20 61 20 64 69 | 66 66 65 72 65 6e 74 20 |ith a di|fferent |
|00000980| 4e 75 6d 62 65 72 20 45 | 61 63 68 20 50 61 73 73 |Number E|ach Pass|
|00000990| 00 00 04 04 06 52 00 00 | 00 00 19 04 00 06 00 36 |.....R..|.......6|
|000009a0| 04 02 73 65 6c 00 ff a2 | 05 0e 00 74 00 06 00 12 |..sel...|...t....|
|000009b0| 04 02 70 69 63 6b 00 5c | 00 06 00 30 02 00 78 78 |..pick.\|...0..xx|
|000009c0| 00 5c 00 3e 00 00 00 03 | 00 7c 00 00 05 04 06 52 |.\.>....|.|.....R|
|000009d0| 00 02 20 20 00 00 15 04 | 06 52 00 22 20 4e 6f 77 |.. ....|.R." Now|
|000009e0| 20 72 65 6d 6f 76 65 20 | 75 6e 77 61 6e 74 65 64 | remove |unwanted|
|000009f0| 20 30 27 73 20 66 72 6f | 6d 20 53 45 4c 24 00 00 | 0's fro|m SEL$..|
|00000a00| 04 04 06 52 00 00 00 00 | 27 04 02 be 00 46 05 28 |...R....|'....F.(|
|00000a10| 00 74 00 06 00 36 04 02 | 73 65 6c 00 00 5c 00 3e |.t...6..|sel..\.>|
|00000a20| 00 00 00 02 00 7c ff a2 | 00 26 00 02 30 30 02 c6 |.....|..|.&..00..|
|00000a30| 00 06 00 36 04 02 73 65 | 6c 00 ff a2 05 36 00 74 |...6..se|l....6.t|
|00000a40| 00 06 00 36 04 02 73 65 | 6c 00 00 5c 00 3e 00 00 |...6..se|l..\.>..|
|00000a50| 00 01 00 7c 00 00 27 04 | 02 be 00 46 05 28 00 74 |...|..'.|...F.(.t|
|00000a60| 00 06 00 36 04 02 73 65 | 6c 00 00 5c 00 3e 00 00 |...6..se|l..\.>..|
|00000a70| 00 01 00 7c ff a2 00 26 | 00 01 30 00 02 c6 00 06 |...|...&|..0.....|
|00000a80| 00 36 04 02 73 65 6c 00 | ff a2 05 36 00 74 00 06 |.6..sel.|...6.t..|
|00000a90| 00 36 04 02 73 65 6c 00 | 00 5c 00 3e 00 00 00 02 |.6..sel.|.\.>....|
|00000aa0| 00 7c 00 00 05 04 06 52 | 00 02 20 20 00 00 17 04 |.|.....R|.. ....|
|00000ab0| 06 52 00 26 20 44 69 73 | 70 6c 61 79 20 74 68 65 |.R.& Dis|play the|
|00000ac0| 20 72 61 6e 64 6f 6d 6c | 79 20 73 65 6c 65 63 74 | randoml|y select|
|00000ad0| 65 64 20 6e 75 6d 62 65 | 72 20 00 00 04 04 06 52 |ed numbe|r .....R|
|00000ae0| 00 00 00 00 12 04 0f 4a | 00 06 00 24 02 00 78 70 |.......J|...$..xp|
|00000af0| 00 5c 00 06 00 2a 02 00 | 79 70 00 5c 00 06 00 36 |.\...*..|yp.\...6|
|00000b00| 04 02 73 65 6c 00 00 00 | 04 04 06 52 00 00 00 00 |..sel...|...R....|
|00000b10| 26 04 06 52 00 44 20 53 | 65 74 20 53 50 20 74 6f |&..R.D S|et SP to|
|00000b20| 20 65 71 75 61 6c 20 74 | 68 65 20 53 74 61 72 74 | equal t|he Start|
|00000b30| 20 50 6f 73 69 74 69 6f | 6e 20 6f 66 20 73 65 6c | Positio|n of sel|
|00000b40| 65 63 74 65 64 20 6e 75 | 6d 62 65 72 20 77 69 74 |ected nu|mber wit|
|00000b50| 68 69 6e 20 50 49 43 4b | 24 20 00 00 27 04 06 52 |hin PICK|$ ..'..R|
|00000b60| 00 46 20 53 65 74 20 45 | 50 20 74 6f 20 65 71 75 |.F Set E|P to equ|
|00000b70| 61 6c 20 53 50 2b 32 20 | 2d 20 45 6e 64 20 50 6f |al SP+2 |- End Po|
|00000b80| 73 69 74 69 6f 6e 20 6f | 66 20 73 65 6c 65 63 74 |sition o|f select|
|00000b90| 65 64 20 6e 75 6d 62 65 | 72 20 77 69 74 68 69 6e |ed numbe|r within|
|00000ba0| 20 50 49 43 4b 24 20 20 | 00 00 04 04 06 52 00 00 | PICK$ |.....R..|
|00000bb0| 00 00 27 04 00 06 00 3c | 02 00 73 70 ff a2 00 06 |..'....<|..sp....|
|00000bc0| 00 30 02 00 78 78 00 54 | 00 06 00 42 02 00 65 70 |.0..xx.T|...B..ep|
|00000bd0| ff a2 00 06 00 30 02 00 | 78 78 ff c0 00 3e 00 00 |.....0..|xx...>..|
|00000be0| 00 02 00 54 00 06 00 2a | 02 00 79 70 ff a2 00 06 |...T...*|..yp....|
|00000bf0| 00 2a 02 00 79 70 ff c0 | 00 3e 00 00 00 08 00 00 |.*..yp..|.>......|
|00000c00| 05 04 06 52 00 02 20 20 | 00 00 0b 04 06 52 00 0e |...R.. |.....R..|
|00000c10| 20 52 65 64 75 63 65 20 | 50 49 43 4b 24 20 00 00 | Reduce |PICK$ ..|
|00000c20| 04 04 06 52 00 00 00 00 | 38 04 00 06 00 12 04 02 |...R....|8.......|
|00000c30| 70 69 63 6b ff a2 05 0e | 00 74 00 06 00 12 04 02 |pick....|.t......|
|00000c40| 70 69 63 6b 00 5c 00 3e | 00 00 00 01 00 5c 00 06 |pick.\.>|.....\..|
|00000c50| 00 3c 02 00 73 70 ff ca | 00 3e 00 00 00 01 00 7c |.<..sp..|.>.....||
|00000c60| ff c0 05 0e 00 74 00 06 | 00 12 04 02 70 69 63 6b |.....t..|....pick|
|00000c70| 00 5c 00 06 00 42 02 00 | 65 70 ff c0 00 3e 00 00 |.\...B..|ep...>..|
|00000c80| 00 01 00 5c 05 da 00 74 | 00 06 00 12 04 02 70 69 |...\...t|......pi|
|00000c90| 63 6b 00 7c 00 7c 00 00 | 0c 04 02 be 00 4e 00 06 |ck.|.|..|.....N..|
|00000ca0| 00 2a 02 00 79 70 ff b6 | 00 3e 00 00 00 e8 00 00 |.*..yp..|.>......|
|00000cb0| 1a 07 00 06 00 24 02 00 | 78 70 ff a2 00 06 00 24 |.....$..|xp.....$|
|00000cc0| 02 00 78 70 ff c0 00 06 | 00 0c 04 00 67 61 70 00 |..xp....|....gap.|
|00000cd0| 00 54 00 06 00 2a 02 00 | 79 70 ff a2 00 3e 00 00 |.T...*..|yp...>..|
|00000ce0| 00 08 00 00 03 04 02 da | 00 00 07 01 02 46 00 06 |........|.....F..|
|00000cf0| 00 18 02 00 78 00 00 00 | 3a 01 10 50 00 3e 00 00 |....x...|:..P.>..|
|00000d00| 00 02 00 5c 00 3e 00 00 | 00 06 00 54 0f 4a 00 3e |...\.>..|...T.J.>|
|00000d10| 00 00 00 1e 00 5c 00 3e | 00 00 00 f1 00 5c 00 26 |.....\.>|.....\.&|
|00000d20| 00 47 20 42 65 74 20 79 | 6f 75 20 63 61 6e 27 74 |.G Bet y|ou can't|
|00000d30| 20 66 69 6e 64 20 61 20 | 44 75 70 6c 69 63 61 74 | find a |Duplicat|
|00000d40| 65 64 20 4e 75 6d 62 65 | 72 20 3f 20 2d 20 50 72 |ed Numbe|r ? - Pr|
|00000d50| 65 73 73 20 61 6e 79 20 | 4b 65 79 20 74 6f 20 72 |ess any |Key to r|
|00000d60| 65 2d 73 74 61 72 74 2e | 20 00 00 00 03 01 12 90 |e-start.| .......|
|00000d70| 00 00 09 01 02 a8 00 18 | ff f4 06 00 62 65 67 69 |........|....begi|
|00000d80| 6e 00 00 00 41 6d 42 73 | 00 00 |n...AmBs|.. |
+--------+-------------------------+-------------------------+--------+--------+